home *** CD-ROM | disk | FTP | other *** search
/ Invenzioni & Inventori / Invenzioni and Inventori (Eclectica Publishing) (1996).ISO / invenzio / menu.dir / 00064_Script_64 < prev    next >
Text File  |  1983-01-30  |  363b  |  13 lines
  1. on suonom canale,fileaudio 
  2.   global qualefile
  3.   if the machinetype < 255 then
  4.     set qualefile to ("invenzioni:invenzio:musiche:"&fileaudio&".aif")
  5.   else
  6.     set cddrive to char 1 of the moviepath
  7.     set qualefile to cddrive&":\invenzio\musiche\"&fileaudio&".aif"
  8.   end if
  9.   put "suono = ",canale,qualefile
  10.   sound playfile canale, qualefile
  11. end
  12.  
  13.